function save_image(image, filename)
% SAVE_IMAGE 
%   Guarda una imagen que se recibe como vector en el archivo 
%   recibido por paramtero en el directorio que se indica en constants.m

global OUTPUT_DIRECTORY;
global HSIZE;
global VSIZE;

matrix = ones (HSIZE, VSIZE);
count = 1;

for i=1:HSIZE
    for j=1:VSIZE
        if (image(count) == -1)
            matrix (i,j) = 0;
        end
        count = count + 1;
    end
end

filename = strcat (OUTPUT_DIRECTORY, filename, '.png');
imwrite (matrix, filename);

end

